home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 02 - 1986 / 02.02 Feb 86.sit / 02.02 Feb 86 / Basic 2.2 / Kelly's Basic / Screen Demo < prev   
MacBinary  |  1985-12-16  |  2.1 KB  |  [TEXT/MSBB]
open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: MacBinary (archive/macBinary).

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Sun Dec 15 21:03:36 1985, modified Sun Dec 15 21:03:36 1985, creator Microsoft BASIC (binary), type ASCII, 1392 bytes "Screen Demo" , at 0x5f0 529 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[MSBB]


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 53 63 72 65 65 6e | 20 44 65 6d 6f 00 00 00 |..Screen| Demo...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 53 42 | 42 01 00 00 00 00 00 00 |.TEXTMSB|B.......|
|00000050| 00 00 00 00 00 05 70 00 | 00 02 11 9a 29 33 78 9a |......p.|....)3x.|
|00000060| 29 33 78 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |)3x.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 5d b8 00 00 |........|....]...|
|00000080| 27 53 63 72 65 65 6e 20 | 44 65 6d 6f 0d 27 42 79 |'Screen |Demo.'By|
|00000090| 20 44 61 76 65 20 4b 65 | 6c 6c 79 0d 27 a9 4d 61 | Dave Ke|lly.'.Ma|
|000000a0| 63 54 75 74 6f 72 20 31 | 39 38 36 0d 0d 4c 49 42 |cTutor 1|986..LIB|
|000000b0| 52 41 52 59 20 22 53 63 | 72 65 65 6e 20 44 65 6d |RARY "Sc|reen Dem|
|000000c0| 6f 22 0d 6d 65 6d 25 3d | 31 32 38 3a 49 46 20 46 |o".mem%=|128:IF F|
|000000d0| 52 45 28 30 29 3e 37 35 | 30 30 30 21 20 54 48 45 |RE(0)>75|000! THE|
|000000e0| 4e 20 6d 65 6d 25 3d 35 | 31 32 0d 47 4f 53 55 42 |N mem%=5|12.GOSUB|
|000000f0| 20 53 65 74 6d 65 6e 75 | 62 61 72 0d 4d 45 4e 55 | Setmenu|bar.MENU|
|00000100| 20 4f 4e 0d 4f 4e 20 4d | 45 4e 55 20 47 4f 53 55 | ON.ON M|ENU GOSU|
|00000110| 42 20 6d 65 6e 75 63 68 | 65 63 6b 0d 6c 6f 6f 70 |B menuch|eck.loop|
|00000120| 3a 20 47 4f 54 4f 20 6c | 6f 6f 70 0d 6d 65 6e 75 |: GOTO l|oop.menu|
|00000130| 63 68 65 63 6b 3a 0d 20 | 20 20 20 6d 65 6e 75 6e |check:. |   menun|
|00000140| 75 6d 62 65 72 3d 4d 45 | 4e 55 28 30 29 3a 49 46 |umber=ME|NU(0):IF|
|00000150| 20 6d 65 6e 75 6e 75 6d | 62 65 72 3c 3e 36 20 54 | menunum|ber<>6 T|
|00000160| 48 45 4e 20 52 45 54 55 | 52 4e 0d 20 20 20 20 6d |HEN RETU|RN.    m|
|00000170| 65 6e 75 69 74 65 6d 3d | 4d 45 4e 55 28 31 29 3a |enuitem=|MENU(1):|
|00000180| 4d 45 4e 55 0d 20 20 20 | 20 4f 4e 20 6d 65 6e 75 |MENU.   | ON menu|
|00000190| 69 74 65 6d 20 47 4f 53 | 55 42 20 42 6c 61 6e 6b |item GOS|UB Blank|
|000001a0| 2c 69 6e 76 65 72 74 2c | 46 6c 61 73 68 2c 44 65 |,invert,|Flash,De|
|000001b0| 6d 6f 2c 51 75 69 74 0d | 20 20 20 20 53 65 74 6d |mo,Quit.|    Setm|
|000001c0| 65 6e 75 62 61 72 3a 0d | 20 20 20 20 20 20 20 20 |enubar:.|        |
|000001d0| 4d 45 4e 55 20 52 45 53 | 45 54 20 20 27 20 52 65 |MENU RES|ET  ' Re|
|000001e0| 2d 64 6f 20 6d 65 6e 75 | 20 62 61 72 0d 20 20 20 |-do menu| bar.   |
|000001f0| 20 20 20 20 20 4d 45 4e | 55 20 36 2c 30 2c 31 2c |     MEN|U 6,0,1,|
|00000200| 22 50 72 6f 67 72 61 6d | 20 4d 65 6e 75 22 0d 20 |"Program| Menu". |
|00000210| 20 20 20 20 20 20 20 4d | 45 4e 55 20 36 2c 31 2c |       M|ENU 6,1,|
|00000220| 31 2c 22 42 6c 61 6e 6b | 20 53 63 72 65 65 6e 22 |1,"Blank| Screen"|
|00000230| 0d 20 20 20 20 20 20 20 | 20 4d 45 4e 55 20 36 2c |.       | MENU 6,|
|00000240| 32 2c 31 2c 22 49 6e 76 | 65 72 74 20 53 63 72 65 |2,1,"Inv|ert Scre|
|00000250| 65 6e 22 0d 20 20 20 20 | 20 20 20 20 4d 45 4e 55 |en".    |    MENU|
|00000260| 20 36 2c 33 2c 31 2c 22 | 46 6c 61 73 68 20 53 63 | 6,3,1,"|Flash Sc|
|00000270| 72 65 65 6e 22 0d 20 20 | 20 20 20 20 20 20 4d 45 |reen".  |      ME|
|00000280| 4e 55 20 36 2c 34 2c 31 | 2c 22 44 65 6d 6f 22 0d |NU 6,4,1|,"Demo".|
|00000290| 20 20 20 20 20 20 20 20 | 4d 45 4e 55 20 36 2c 35 |        |MENU 6,5|
|000002a0| 2c 31 2c 22 51 75 69 74 | 22 0d 52 45 54 55 52 4e |,1,"Quit|".RETURN|
|000002b0| 0d 42 6c 61 6e 6b 3a 0d | 48 49 44 45 43 55 52 53 |.Blank:.|HIDECURS|
|000002c0| 4f 52 0d 43 41 4c 4c 20 | 42 6c 61 6e 6b 53 63 72 |OR.CALL |BlankScr|
|000002d0| 65 65 6e 28 6d 65 6d 25 | 29 0d 53 48 4f 57 43 55 |een(mem%|).SHOWCU|
|000002e0| 52 53 4f 52 0d 52 45 54 | 55 52 4e 0d 0d 69 6e 76 |RSOR.RET|URN..inv|
|000002f0| 65 72 74 3a 0d 48 49 44 | 45 43 55 52 53 4f 52 0d |ert:.HID|ECURSOR.|
|00000300| 43 41 4c 4c 20 69 6e 76 | 65 72 74 53 63 72 65 65 |CALL inv|ertScree|
|00000310| 6e 28 6d 65 6d 25 29 0d | 53 48 4f 57 43 55 52 53 |n(mem%).|SHOWCURS|
|00000320| 4f 52 0d 52 45 54 55 52 | 4e 0d 0d 46 6c 61 73 68 |OR.RETUR|N..Flash|
|00000330| 3a 0d 48 49 44 45 43 55 | 52 53 4f 52 0d 46 4f 52 |:.HIDECU|RSOR.FOR|
|00000340| 20 69 3d 30 20 54 4f 20 | 31 30 30 0d 43 41 4c 4c | i=0 TO |100.CALL|
|00000350| 20 69 6e 76 65 72 74 53 | 63 72 65 65 6e 28 6d 65 | invertS|creen(me|
|00000360| 6d 25 29 0d 4e 45 58 54 | 0d 53 48 4f 57 43 55 52 |m%).NEXT|.SHOWCUR|
|00000370| 53 4f 52 0d 52 45 54 55 | 52 4e 0d 0d 44 65 6d 6f |SOR.RETU|RN..Demo|
|00000380| 3a 0d 57 49 4e 44 4f 57 | 20 43 4c 4f 53 45 20 31 |:.WINDOW| CLOSE 1|
|00000390| 0d 47 4f 53 55 42 20 42 | 6c 61 6e 6b 0d 57 49 4e |.GOSUB B|lank.WIN|
|000003a0| 44 4f 57 20 31 2c 22 22 | 2c 28 34 32 2c 39 30 29 |DOW 1,""|,(42,90)|
|000003b0| 2d 28 34 37 35 2c 33 30 | 30 29 2c 33 0d 50 52 49 |-(475,30|0),3.PRI|
|000003c0| 4e 54 20 22 43 6c 69 63 | 6b 20 68 65 72 65 22 0d |NT "Clic|k here".|
|000003d0| 57 48 49 4c 45 20 4d 4f | 55 53 45 28 30 29 3c 3e |WHILE MO|USE(0)<>|
|000003e0| 31 3a 57 45 4e 44 0d 47 | 4f 53 55 42 20 69 6e 76 |1:WEND.G|OSUB inv|
|000003f0| 65 72 74 0d 57 48 49 4c | 45 20 4d 4f 55 53 45 28 |ert.WHIL|E MOUSE(|
|00000400| 30 29 3c 3e 31 3a 57 45 | 4e 44 0d 47 4f 53 55 42 |0)<>1:WE|ND.GOSUB|
|00000410| 20 69 6e 76 65 72 74 3a | 43 4c 53 3a 47 4f 53 55 | invert:|CLS:GOSU|
|00000420| 42 20 69 6e 76 65 72 74 | 0d 57 49 4e 44 4f 57 20 |B invert|.WINDOW |
|00000430| 32 2c 22 22 2c 28 31 30 | 32 2c 31 34 30 29 2d 28 |2,"",(10|2,140)-(|
|00000440| 34 31 30 2c 32 34 30 29 | 2c 33 0d 50 52 49 4e 54 |410,240)|,3.PRINT|
|00000450| 20 22 43 6c 69 63 6b 20 | 68 65 72 65 22 0d 57 48 | "Click |here".WH|
|00000460| 49 4c 45 20 4d 4f 55 53 | 45 28 30 29 3c 3e 31 3a |ILE MOUS|E(0)<>1:|
|00000470| 57 45 4e 44 0d 47 4f 53 | 55 42 20 69 6e 76 65 72 |WEND.GOS|UB inver|
|00000480| 74 0d 57 48 49 4c 45 20 | 4d 4f 55 53 45 28 30 29 |t.WHILE |MOUSE(0)|
|00000490| 3c 3e 31 3a 57 45 4e 44 | 0d 47 4f 53 55 42 20 69 |<>1:WEND|.GOSUB i|
|000004a0| 6e 76 65 72 74 3a 43 4c | 53 3a 47 4f 53 55 42 20 |nvert:CL|S:GOSUB |
|000004b0| 69 6e 76 65 72 74 0d 57 | 49 4e 44 4f 57 20 33 2c |invert.W|INDOW 3,|
|000004c0| 22 22 2c 28 31 35 32 2c | 31 36 35 29 2d 28 33 36 |"",(152,|165)-(36|
|000004d0| 30 2c 32 31 35 29 2c 33 | 0d 50 52 49 4e 54 20 22 |0,215),3|.PRINT "|
|000004e0| 43 6c 69 63 6b 20 68 65 | 72 65 22 0d 57 48 49 4c |Click he|re".WHIL|
|000004f0| 45 20 4d 4f 55 53 45 28 | 30 29 3c 3e 31 3a 57 45 |E MOUSE(|0)<>1:WE|
|00000500| 4e 44 0d 47 4f 53 55 42 | 20 69 6e 76 65 72 74 0d |ND.GOSUB| invert.|
|00000510| 57 48 49 4c 45 20 4d 4f | 55 53 45 28 30 29 3c 3e |WHILE MO|USE(0)<>|
|00000520| 31 3a 57 45 4e 44 0d 47 | 4f 53 55 42 20 69 6e 76 |1:WEND.G|OSUB inv|
|00000530| 65 72 74 3a 43 4c 53 3a | 47 4f 53 55 42 20 69 6e |ert:CLS:|GOSUB in|
|00000540| 76 65 72 74 0d 47 4f 53 | 55 42 20 69 6e 76 65 72 |vert.GOS|UB inver|
|00000550| 74 0d 50 52 49 4e 54 20 | 53 50 43 28 34 29 3b 22 |t.PRINT |SPC(4);"|
|00000560| 50 6c 65 61 73 65 20 6d | 61 6b 65 20 73 65 6c 65 |Please m|ake sele|
|00000570| 63 74 69 6f 6e 22 3a 50 | 52 49 4e 54 20 53 50 43 |ction":P|RINT SPC|
|00000580| 28 35 29 3b 22 66 72 6f | 6d 20 6d 65 6e 75 73 20 |(5);"fro|m menus |
|00000590| 61 62 6f 76 65 21 22 0d | 52 45 54 55 52 4e 0d 0d |above!".|RETURN..|
|000005a0| 51 75 69 74 3a 0d 46 4f | 52 20 69 3d 31 20 54 4f |Quit:.FO|R i=1 TO|
|000005b0| 20 34 0d 20 20 20 20 57 | 49 4e 44 4f 57 20 43 4c | 4.    W|INDOW CL|
|000005c0| 4f 53 45 20 69 0d 4e 45 | 58 54 20 69 0d 4d 45 4e |OSE i.NE|XT i.MEN|
|000005d0| 55 20 52 45 53 45 54 3a | 4c 49 42 52 41 52 59 20 |U RESET:|LIBRARY |
|000005e0| 43 4c 4f 53 45 0d 43 4c | 53 3a 45 4e 44 0d 0d 0d |CLOSE.CL|S:END...|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 00 00 01 00 00 00 01 a6 | 00 00 00 a6 00 00 00 6b |........|.......k|
|00000610| 06 01 98 0c 19 9f 8e 02 | fd 00 01 32 aa f9 00 01 |........|...2....|
|00000620| 55 30 fc 00 0b 98 00 08 | cc d9 e1 f3 67 8f f8 0c |U0......|....g...|
|00000630| 0b 53 63 72 65 65 6e 20 | 44 65 6d 6f 02 00 00 00 |.Screen |Demo....|
|00000640| 54 45 58 54 4d 53 42 42 | 01 00 00 00 01 00 00 00 |TEXTMSBB|........|
|00000650| 00 00 54 45 58 54 4d 53 | 42 42 01 00 00 00 01 00 |..TEXTMS|BB......|
|00000660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000670| 00 00 9a 09 2b e5 00 00 | 05 70 00 00 02 11 f8 c3 |....+...|.p......|
|00000680| 33 33 07 cc cc 0f 80 fd | 00 02 0a 22 30 e8 00 06 |33......|..."0...|
|00000690| 01 9c 0c 19 8f 0e 02 fd | 00 01 33 55 f9 00 01 ab |........|..3U....|
|000006a0| 30 fc 00 0b 98 00 08 c0 | c3 33 33 0c cc cc 0c c0 |0.......|.33.....|
|000006b0| fd 00 02 08 88 90 f5 00 | 00 08 f5 00 01 01 90 fd |........|........|
|000006c0| 00 00 02 fd 00 01 32 aa | f9 00 01 55 30 fc 00 0b |......2.|...U0...|
|000006d0| 98 00 08 c0 c3 33 33 0c | cc cc 0c c0 fd 00 02 0a |.....33.|........|
|000006e0| 22 30 e8 00 01 01 90 fd | 00 00 02 fd 00 01 33 55 |"0......|......3U|
|000006f0| f9 00 01 ab 30 fc 00 0b | 98 00 08 c0 c3 33 33 0c |....0...|.....33.|
|00000700| 00 00 00 44 00 08 00 00 | 4e ad 00 2a 4e ad 00 32 |...D....|N..*N..2|
|00000710| 0c 43 00 80 67 00 00 1a | 0c 43 02 00 67 00 00 08 |.C..g...|.C..g...|
|00000720| 74 44 4e ad 00 42 41 f9 | 00 07 a7 00 4e fa 00 08 |tDN..BA.|....N...|
|00000730| 41 f9 00 01 a7 00 32 3c | 15 5f 20 3c ff ff ff ff |A.....2<|._ <....|
|00000740| 20 c0 51 c9 ff fc 4e 75 | 00 00 00 4a 00 08 00 00 | .Q...Nu|...J....|
|00000750| 4e ba 00 3a 0c 43 00 80 | 67 00 00 1a 0c 43 02 00 |N..:.C..|g....C..|
|00000760| 67 00 00 08 74 44 4e ad | 00 42 41 f9 00 07 a7 00 |g...tDN.|.BA.....|
|00000770| 4e fa 00 08 41 f9 00 01 | a7 00 32 3c 15 5f 20 3c |N...A...|..2<._ <|
|00000780| ff ff ff ff b1 98 51 c9 | ff fc 4e 75 4e ad 00 2a |......Q.|..NuN..*|
|00000790| 4e ad 00 32 4e 75 00 00 | 00 0c 00 00 00 01 42 68 |N..2Nu..|......Bh|
|000007a0| 00 06 70 00 4e 75 00 00 | 01 00 00 00 01 a6 00 00 |..p.Nu..|........|
|000007b0| 00 a6 00 00 00 6b 00 01 | 2e 8c 00 98 00 00 00 1c |.....k..|........|
|000007c0| 00 4a 00 00 43 4f 44 45 | 00 02 00 0a 00 01 00 19 |.J..CODE|........|
|000007d0| 00 00 00 96 00 01 2d b0 | 00 02 00 0c 00 00 00 48 |......-.|.......H|
|000007e0| 00 00 00 00 00 03 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 0b 42 6c 61 6e 6b 53 63 | 72 65 65 6e 0c 49 6e 76 |.BlankSc|reen.Inv|
|00000800| 65 72 74 53 63 72 65 65 | 6e 07 4c 49 42 69 6e 69 |ertScree|n.LIBini|
|00000810| 74 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |t.......|........|
|00000820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+